home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / applications / wp / write.lha / WRITE / Config / STARTUP.CONFIG < prev    next >
Encoding:
Text File  |  1995-01-04  |  2.3 KB  |  104 lines
  1. /* $VER: STARTUP.CONFIG 3.1090 */
  2. VERSIONCHECK 31090 "STARTUP.CONFIG"
  3.  
  4. /* Userfunktionen */
  5.  
  6. START 
  7.   SETBACKUP 0 "#?" "dh0:backup/WRITE.backup"
  8.   SETBACKUP 1 "#?(.mod|.tex)" ".bak"
  9.   SETBACKUP HIGHER "" ""
  10.   SETPANNEL 0 "Konv. Umlaute"
  11.     DOREXX "REXX:UmlautConverter.wrx" "" {@ASYNC};
  12.   SETPANNEL 1 "AREXX-Guide"
  13.     SYSTEM "MultiView help:deutsch/AREXX.guide" {@ASYNC};
  14.   SETPANNEL HIGHER "AutoDocs"
  15.     SYSTEM "MultiView help:deutsch/autodocs/autodoc" {@ASYNC};
  16.   SETPANNEL 3 "Renumber"
  17.     DOREXX "REXX:Renumber.wrx" "" {@ASYNC};
  18.   SETPANNEL 4 "ListBrowser"
  19.     SHOWLIST "List-List" 0 {@SELECT}
  20.     SHOWLIST _RS 0 ;
  21.   SETPANNEL 5 "???";
  22.   SETPANNEL 6 "???";
  23.   SETPANNEL 7 "???";
  24.   SETHOTKEY 0 "CONTROL ALT w"
  25.     NEWED ""
  26.     WINDOW 0 0 0 0 ;
  27.   SETHOTKEY 1 "CONTROL ALT m"
  28.     WINMANAGER ;
  29.   SETHOTKEY HIGHER "CONTROL ALT o"
  30.     NEWED ""
  31.     WINDOW 0 0 0 0 
  32.     GETFILE "" "" 
  33.     OPEN _PATH ;
  34.   SETHOTKEY 3 "CONTROL ALT t"
  35.     MESSAGEOK "Die aktuelle Zeit ist :\n$_Time$" ;
  36.   SETHOTKEY 4 "CONTROL ALT s"
  37.     NEWED ""
  38.     WINDOW 0 0 0 0 {@SIMPLEWIN};
  39.   MACRO "M_OPEN"
  40.     IF 
  41.       COMPARE 0 _CHANGED;
  42.       NOP;
  43.       ASK ("$_FileName$"\nist verändert worden !\nText geht verloren !) "_Neu öffnen|_Speichern  & neu öffnen*|A_bbrechen !^" 
  44.       BREAK 0 _RN HIGHER ;
  45.     IF 
  46.       COMPARE _RN 1;
  47.       SAVE _FILENAME ;
  48.       NOP;
  49.     GETFILE "" "" 
  50.     OPEN _PATH ;
  51.   MACRO "M_NEW"
  52.     IF 
  53.       COMPARE 0 _CHANGED;
  54.       NOP;
  55.       ASK ("$_FileName$"\nist verändert worden !\nText geht verloren !) "_Löschen|_Speichern & löschen*|A_bbrechen !^" 
  56.       BREAK 0 _RN HIGHER ;
  57.     IF 
  58.       COMPARE _RN 1;
  59.       SAVE _FILENAME ;
  60.       NOP;
  61.     NEW
  62.     SETTITLE "Text gelöscht." 0;
  63.   MACRO "M_SAVE_QUIT"
  64.     IF 
  65.       COMPARE 0 _CHANGED;
  66.       NOP;
  67.       SAVE _FILENAME ;
  68.     QUITED;
  69.   MACRO "M_QUIT"
  70.     IF 
  71.       COMPARE 0 _CHANGED;
  72.       NOP;
  73.       ASK ("$_FileName$"\nist verändert worden !\nText geht verloren !) "_Ende|_Speichern & Ende*|A_bbrechen !^" 
  74.       BREAK 0 _RN HIGHER ;
  75.     IF 
  76.       COMPARE _RN 1;
  77.       SAVE _FILENAME ;
  78.       NOP;
  79.     QUITED;
  80.   ;
  81.  
  82. QUIT  
  83.  
  84.   ;
  85.  
  86. SETUSERFKT 2
  87.   NEWED ""
  88.   WINDOW 0 0 0 0 
  89.   ;
  90.  
  91.  
  92. /* lokale Variablen */
  93.  
  94. SETVAR "_SCRRELWIDTH" 698
  95. SETVAR "_SCRRELHEIGHT" 528
  96.  
  97. /* globale Variablen */
  98.  
  99. SETVAR "_APPICON" TRUE
  100. SETVAR "_APPWINDOW" TRUE
  101. SETVAR "_APPMENU" TRUE
  102. SETVAR "_REQTOMOUSE" FALSE
  103. SETVAR "_READSPEED" 20
  104.